perm filename DPYIII[1,BGB] blob
sn#001243 filedate 1972-10-22 generic text, type T, neo UTF8
00100 α DISPLAY SUBR;
00200 REQUIRE "DPYIII[SYS,BGB]" LOAD_MODULE;
00300 EXTERNAL PROCEDURE DPYSET(INTEGER ARRAY DPYBUF);
00400 EXTERNAL PROCEDURE DPYOUT(INTEGER POG);
00500 EXTERNAL PROCEDURE AIVECT(INTEGER X,Y);
00600 EXTERNAL PROCEDURE AVECT(INTEGER X,Y);
00610 EXTERNAL PROCEDURE RIVECT(INTEGER X,Y);
00620 EXTERNAL PROCEDURE RVECT(INTEGER X,Y);
00700 EXTERNAL PROCEDURE HYDPOG(INTEGER POG);
00800 EXTERNAL PROCEDURE DPYSST(STRING S);
00900 EXTERNAL PROCEDURE DPYBRT(INTEGER X);
01000 EXTERNAL PROCEDURE DPYBIG(INTEGER SIZ);
01100 EXTERNAL PROCEDURE DPYCLR;